sort_procedure Interface

interface
public subroutine sort_procedure(my_sort, list, order)

Arguments

Type IntentOptional Attributes Name
class(sort_base), intent(inout) :: my_sort

my_sort: A sort_base object

real(kind=wp), intent(inout), dimension(:) :: list

list: A real vector

integer, intent(inout), dimension(:) :: order

order: An integer vector

Description

Subroutine to sort an array import sort_base